/ MacFormat 1996 January / macformat-033.iso / mac / Education / HyperGlot / Learn to Speak Spanish v4.1 / Learn to Speak Spanish 4.1 / Orientation / Orientation.rsrc / VWCI_1148

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 e4 20 20 | 00 00 00 01 00 00 00 00 |......  |........|
|00000010| 00 05 00 00 00 00 00 00 | 0a 0d 00 00 0a 0d 00 00 |........|........|
|00000020| 0a 0d 00 00 0a 0d 00 00 | 0a 0d 6f 6e 20 6d 6f 75 |........|..on mou|
|00000030| 73 65 55 70 0d 20 20 67 | 6c 6f 62 61 6c 20 73 70 |seUp.  g|lobal sp|
|00000040| 72 69 74 65 4e 75 6d 0d | 20 20 69 66 20 73 70 72 |riteNum.|  if spr|
|00000050| 69 74 65 4e 75 6d 20 3e | 20 30 20 74 68 65 6e 20 |iteNum >| 0 then |
|00000060| 72 65 74 75 72 6e 0d 20 | 20 70 75 74 20 28 74 68 |return. | put (th|
|00000070| 65 20 6d 6f 75 73 65 56 | 2b 31 30 29 20 69 6e 74 |e mouseV|+10) int|
|00000080| 6f 20 79 0d 20 20 70 75 | 74 20 74 68 65 20 6d 6f |o y.  pu|t the mo|
|00000090| 75 73 65 48 20 69 6e 74 | 6f 20 78 0d 20 20 0d 20 |useH int|o x.  . |
|000000a0| 20 69 66 20 6d 6f 75 73 | 65 43 68 65 63 6b 20 28 | if mous|eCheck (|
|000000b0| 39 36 2c 20 39 38 2c 20 | 31 32 38 2c 20 31 33 33 |96, 98, |128, 133|
|000000c0| 2c 20 78 2c 20 79 29 20 | 74 68 65 6e 0d 20 20 20 |, x, y) |then.   |
|000000d0| 20 73 65 74 20 73 70 72 | 69 74 65 4e 75 6d 20 74 | set spr|iteNum t|
|000000e0| 6f 20 33 0d 20 20 65 6c | 73 65 20 69 66 20 6d 6f |o 3.  el|se if mo|
|000000f0| 75 73 65 43 68 65 63 6b | 20 28 31 36 34 2c 20 37 |useCheck| (164, 7|
|00000100| 39 2c 20 31 39 31 2c 20 | 31 32 31 2c 20 78 2c 20 |9, 191, |121, x, |
|00000110| 79 29 20 74 68 65 6e 0d | 20 20 20 20 70 75 70 70 |y) then.|    pupp|
|00000120| 65 74 53 70 72 69 74 65 | 20 33 20 2c 20 20 20 20 |etSprite| 3 ,    |
|00000130| 54 52 55 45 0d 20 20 20 | 20 73 65 74 20 74 68 65 |TRUE.   | set the|
|00000140| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00000150| 74 65 20 33 20 74 6f 20 | 74 68 65 20 6e 75 6d 62 |te 3 to |the numb|
|00000160| 65 72 20 6f 66 20 63 61 | 73 74 20 22 43 6f 6d 42 |er of ca|st "ComB|
|00000170| 6c 6f 63 6b 22 0d 20 20 | 20 20 75 70 64 61 74 65 |lock".  |  update|
|00000180| 73 74 61 67 65 0d 20 20 | 20 20 73 65 74 20 73 70 |stage.  |  set sp|
|00000190| 72 69 74 65 4e 75 6d 20 | 74 6f 20 33 20 20 0d 20 |riteNum |to 3  . |
|000001a0| 20 65 6c 73 65 20 69 66 | 20 6d 6f 75 73 65 43 68 | else if| mouseCh|
|000001b0| 65 63 6b 20 28 31 36 36 | 2c 20 31 33 38 2c 20 31 |eck (166|, 138, 1|
|000001c0| 38 35 2c 20 31 38 30 2c | 20 78 2c 20 79 29 20 74 |85, 180,| x, y) t|
|000001d0| 68 65 6e 0d 20 20 20 20 | 70 75 70 70 65 74 53 70 |hen.    |puppetSp|
|000001e0| 72 69 74 65 20 33 20 2c | 20 20 20 20 54 52 55 45 |rite 3 ,|    TRUE|
|000001f0| 0d 20 20 20 20 73 65 74 | 20 74 68 65 20 63 61 73 |.    set| the cas|
|00000200| 74 4e 75 6d 20 6f 66 20 | 73 70 72 69 74 65 20 33 |tNum of |sprite 3|
|00000210| 20 74 6f 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f | to the |number o|
|00000220| 66 20 63 61 73 74 20 22 | 43 6f 6d 42 6c 6f 63 6b |f cast "|ComBlock|
|00000230| 22 0d 20 20 20 20 75 70 | 64 61 74 65 73 74 61 67 |".    up|datestag|
|00000240| 65 0d 20 20 20 20 73 65 | 74 20 73 70 72 69 74 65 |e.    se|t sprite|
|00000250| 4e 75 6d 20 74 6f 20 33 | 20 20 0d 20 20 65 6c 73 |Num to 3|  .  els|
|00000260| 65 20 69 66 20 6d 6f 75 | 73 65 43 68 65 63 6b 20 |e if mou|seCheck |
|00000270| 28 33 38 35 2c 20 31 31 | 31 2c 20 34 31 36 2c 20 |(385, 11|1, 416, |
|00000280| 31 34 35 2c 20 78 2c 20 | 79 29 20 74 68 65 6e 0d |145, x, |y) then.|
|00000290| 20 20 20 20 70 75 70 70 | 65 74 53 70 72 69 74 65 |    pupp|etSprite|
|000002a0| 20 33 20 2c 20 20 20 20 | 54 52 55 45 0d 20 20 20 | 3 ,    |TRUE.   |
|000002b0| 20 73 65 74 20 74 68 65 | 20 63 61 73 74 4e 75 6d | set the| castNum|
|000002c0| 20 6f 66 20 73 70 72 69 | 74 65 20 33 20 74 6f 20 | of spri|te 3 to |
|000002d0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|000002e0| 73 74 20 22 43 6f 6d 42 | 6c 6f 63 6b 22 0d 20 20 |st "ComB|lock".  |
|000002f0| 20 20 75 70 64 61 74 65 | 73 74 61 67 65 0d 20 20 |  update|stage.  |
|00000300| 20 20 73 65 74 20 73 70 | 72 69 74 65 4e 75 6d 20 |  set sp|riteNum |
|00000310| 74 6f 20 33 20 20 0d 20 | 20 65 6c 73 65 20 69 66 |to 3  . | else if|
|00000320| 20 6d 6f 75 73 65 43 68 | 65 63 6b 20 28 32 31 37 | mouseCh|eck (217|
|00000330| 2c 20 37 39 2c 20 32 34 | 36 2c 20 31 32 31 2c 20 |, 79, 24|6, 121, |
|00000340| 78 2c 20 79 29 20 74 68 | 65 6e 0d 20 20 20 20 73 |x, y) th|en.    s|
|00000350| 65 74 20 73 70 72 69 74 | 65 4e 75 6d 20 74 6f 20 |et sprit|eNum to |
|00000360| 34 0d 20 20 65 6c 73 65 | 20 69 66 20 6d 6f 75 73 |4.  else| if mous|
|00000370| 65 43 68 65 63 6b 20 28 | 32 36 36 2c 20 37 39 2c |eCheck (|266, 79,|
|00000380| 20 32 39 34 2c 20 31 32 | 31 2c 20 78 2c 20 79 29 | 294, 12|1, x, y)|
|00000390| 20 74 68 65 6e 0d 20 20 | 20 20 73 65 74 20 73 70 | then.  |  set sp|
|000003a0| 72 69 74 65 4e 75 6d 20 | 74 6f 20 35 0d 20 20 65 |riteNum |to 5.  e|
|000003b0| 6c 73 65 20 69 66 20 6d | 6f 75 73 65 43 68 65 63 |lse if m|ouseChec|
|000003c0| 6b 20 28 33 31 36 2c 20 | 39 37 2c 20 33 36 33 2c |k (316, |97, 363,|
|000003d0| 20 31 33 39 2c 20 78 2c | 20 79 29 20 74 68 65 6e | 139, x,| y) then|
|000003e0| 0d 20 20 20 20 73 65 74 | 20 73 70 72 69 74 65 4e |.    set| spriteN|
|000003f0| 75 6d 20 74 6f 20 36 0d | 20 20 65 6c 73 65 20 69 |um to 6.|  else i|
|00000400| 66 20 6d 6f 75 73 65 43 | 68 65 63 6b 20 28 34 30 |f mouseC|heck (40|
|00000410| 35 2c 20 37 37 2c 20 34 | 33 32 2c 20 31 31 31 2c |5, 77, 4|32, 111,|
|00000420| 20 78 2c 20 79 29 20 74 | 68 65 6e 0d 20 20 20 20 | x, y) t|hen.    |
|00000430| 73 65 74 20 73 70 72 69 | 74 65 4e 75 6d 20 74 6f |set spri|teNum to|
|00000440| 20 37 20 20 0d 20 20 65 | 6c 73 65 20 69 66 20 6d | 7  .  e|lse if m|
|00000450| 6f 75 73 65 43 68 65 63 | 6b 20 28 32 38 2c 20 31 |ouseChec|k (28, 1|
|00000460| 33 31 2c 20 36 35 2c 20 | 31 37 33 2c 20 78 2c 20 |31, 65, |173, x, |
|00000470| 79 29 20 74 68 65 6e 0d | 20 20 20 20 73 65 74 20 |y) then.|    set |
|00000480| 73 70 72 69 74 65 4e 75 | 6d 20 74 6f 20 38 0d 20 |spriteNu|m to 8. |
|00000490| 20 65 6c 73 65 20 69 66 | 20 6d 6f 75 73 65 43 68 | else if| mouseCh|
|000004a0| 65 63 6b 20 28 36 36 2c | 20 31 33 36 2c 20 31 30 |eck (66,| 136, 10|
|000004b0| 32 2c 20 31 38 30 2c 20 | 78 2c 20 79 29 20 74 68 |2, 180, |x, y) th|
|000004c0| 65 6e 0d 20 20 20 20 73 | 65 74 20 73 70 72 69 74 |en.    s|et sprit|
|000004d0| 65 4e 75 6d 20 74 6f 20 | 39 0d 20 20 65 6c 73 65 |eNum to |9.  else|
|000004e0| 20 69 66 20 6d 6f 75 73 | 65 43 68 65 63 6b 20 28 | if mous|eCheck (|
|000004f0| 31 30 32 2c 20 31 33 37 | 2c 20 31 33 36 2c 20 31 |102, 137|, 136, 1|
|00000500| 38 30 2c 20 78 2c 20 79 | 29 20 74 68 65 6e 0d 20 |80, x, y|) then. |
|00000510| 20 20 20 73 65 74 20 73 | 70 72 69 74 65 4e 75 6d |   set s|priteNum|
|00000520| 20 74 6f 20 31 30 0d 20 | 20 65 6c 73 65 20 69 66 | to 10. | else if|
|00000530| 20 6d 6f 75 73 65 43 68 | 65 63 6b 20 28 31 33 36 | mouseCh|eck (136|
|00000540| 2c 20 31 35 34 2c 20 31 | 36 36 2c 20 31 39 32 2c |, 154, 1|66, 192,|
|00000550| 20 78 2c 20 79 29 20 74 | 68 65 6e 0d 20 20 20 20 | x, y) t|hen.    |
|00000560| 73 65 74 20 73 70 72 69 | 74 65 4e 75 6d 20 74 6f |set spri|teNum to|
|00000570| 20 31 31 20 20 0d 20 20 | 65 6c 73 65 20 69 66 20 | 11  .  |else if |
|00000580| 6d 6f 75 73 65 43 68 65 | 63 6b 20 28 31 38 35 2c |mouseChe|ck (185,|
|00000590| 20 31 36 33 2c 20 32 31 | 35 2c 20 32 30 33 2c 20 | 163, 21|5, 203, |
|000005a0| 78 2c 20 79 29 20 74 68 | 65 6e 0d 20 20 20 20 73 |x, y) th|en.    s|
|000005b0| 65 74 20 73 70 72 69 74 | 65 4e 75 6d 20 74 6f 20 |et sprit|eNum to |
|000005c0| 31 32 0d 20 20 20 20 0d | 20 20 65 6c 73 65 20 69 |12.    .|  else i|
|000005d0| 66 20 6d 6f 75 73 65 43 | 68 65 63 6b 20 28 32 33 |f mouseC|heck (23|
|000005e0| 32 2c 20 31 34 30 2c 20 | 32 36 33 2c 20 31 38 32 |2, 140, |263, 182|
|000005f0| 2c 20 78 2c 20 79 29 20 | 74 68 65 6e 0d 20 20 20 |, x, y) |then.   |
|00000600| 20 0d 20 20 20 20 73 65 | 74 20 73 70 72 69 74 65 | .    se|t sprite|
|00000610| 4e 75 6d 20 74 6f 20 31 | 33 0d 20 20 65 6c 73 65 |Num to 1|3.  else|
|00000620| 20 69 66 20 6d 6f 75 73 | 65 43 68 65 63 6b 20 28 | if mous|eCheck (|
|00000630| 32 39 31 2c 20 31 34 36 | 2c 20 33 32 34 2c 20 31 |291, 146|, 324, 1|
|00000640| 38 36 2c 20 78 2c 20 79 | 29 20 74 68 65 6e 0d 20 |86, x, y|) then. |
|00000650| 20 20 20 73 65 74 20 73 | 70 72 69 74 65 4e 75 6d |   set s|priteNum|
|00000660| 20 74 6f 20 31 35 0d 20 | 20 65 6c 73 65 20 69 66 | to 15. | else if|
|00000670| 20 6d 6f 75 73 65 43 68 | 65 63 6b 20 28 32 38 31 | mouseCh|eck (281|
|00000680| 2c 20 31 32 36 2c 20 33 | 30 38 2c 20 31 36 36 2c |, 126, 3|08, 166,|
|00000690| 20 78 2c 20 79 29 20 74 | 68 65 6e 0d 20 20 20 20 | x, y) t|hen.    |
|000006a0| 73 65 74 20 73 70 72 69 | 74 65 4e 75 6d 20 74 6f |set spri|teNum to|
|000006b0| 20 31 34 0d 20 20 65 6c | 73 65 20 69 66 20 6d 6f | 14.  el|se if mo|
|000006c0| 75 73 65 43 68 65 63 6b | 20 28 33 35 38 2c 20 31 |useCheck| (358, 1|
|000006d0| 33 33 2c 20 33 38 36 2c | 20 31 37 32 2c 20 78 2c |33, 386,| 172, x,|
|000006e0| 20 79 29 20 74 68 65 6e | 0d 20 20 20 20 73 65 74 | y) then|.    set|
|000006f0| 20 73 70 72 69 74 65 4e | 75 6d 20 74 6f 20 31 36 | spriteN|um to 16|
|00000700| 0d 20 20 65 6c 73 65 20 | 69 66 20 6d 6f 75 73 65 |.  else |if mouse|
|00000710| 43 68 65 63 6b 20 28 34 | 31 31 2c 20 31 32 36 2c |Check (4|11, 126,|
|00000720| 20 34 33 34 2c 20 31 36 | 36 2c 20 78 2c 20 79 29 | 434, 16|6, x, y)|
|00000730| 20 74 68 65 6e 0d 20 20 | 20 20 73 65 74 20 73 70 | then.  |  set sp|
|00000740| 72 69 74 65 4e 75 6d 20 | 74 6f 20 31 37 20 20 0d |riteNum |to 17  .|
|00000750| 20 20 65 6c 73 65 20 69 | 66 20 6d 6f 75 73 65 43 |  else i|f mouseC|
|00000760| 68 65 63 6b 20 28 34 33 | 34 2c 20 31 33 32 2c 20 |heck (43|4, 132, |
|00000770| 34 37 30 2c 20 31 37 33 | 2c 20 78 2c 20 79 29 20 |470, 173|, x, y) |
|00000780| 74 68 65 6e 0d 20 20 20 | 20 73 65 74 20 73 70 72 |then.   | set spr|
|00000790| 69 74 65 4e 75 6d 20 74 | 6f 20 31 38 0d 20 20 65 |iteNum t|o 18.  e|
|000007a0| 6c 73 65 20 69 66 20 6d | 6f 75 73 65 43 68 65 63 |lse if m|ouseChec|
|000007b0| 6b 20 28 33 38 36 2c 20 | 31 35 33 2c 20 34 31 31 |k (386, |153, 411|
|000007c0| 2c 20 31 39 39 2c 20 78 | 2c 20 79 29 20 74 68 65 |, 199, x|, y) the|
|000007d0| 6e 0d 20 20 20 20 73 65 | 74 20 73 70 72 69 74 65 |n.    se|t sprite|
|000007e0| 4e 75 6d 20 74 6f 20 31 | 39 0d 20 20 65 6c 73 65 |Num to 1|9.  else|
|000007f0| 20 69 66 20 6d 6f 75 73 | 65 43 68 65 63 6b 20 28 | if mous|eCheck (|
|00000800| 39 33 2c 20 32 32 39 2c | 20 31 33 35 2c 20 32 37 |93, 229,| 135, 27|
|00000810| 35 2c 20 78 2c 20 79 29 | 20 74 68 65 6e 0d 20 20 |5, x, y)| then.  |
|00000820| 20 20 73 65 74 20 73 70 | 72 69 74 65 4e 75 6d 20 |  set sp|riteNum |
|00000830| 74 6f 20 32 30 20 20 0d | 20 20 65 6c 73 65 20 69 |to 20  .|  else i|
|00000840| 66 20 6d 6f 75 73 65 43 | 68 65 63 6b 20 28 32 34 |f mouseC|heck (24|
|00000850| 30 2c 20 32 31 37 2c 20 | 32 37 33 2c 20 32 36 37 |0, 217, |273, 267|
|00000860| 2c 20 78 2c 20 79 29 20 | 74 68 65 6e 0d 20 20 20 |, x, y) |then.   |
|00000870| 20 73 65 74 20 73 70 72 | 69 74 65 4e 75 6d 20 74 | set spr|iteNum t|
|00000880| 6f 20 32 31 0d 20 20 65 | 6c 73 65 0d 20 20 20 20 |o 21.  e|lse.    |
|00000890| 72 65 74 75 72 6e 20 20 | 0d 20 20 65 6e 64 20 69 |return  |.  end i|
|000008a0| 66 20 0d 20 20 70 75 74 | 20 73 70 72 69 74 65 4e |f .  put| spriteN|
|000008b0| 75 6d 0d 20 20 73 65 74 | 20 74 68 65 20 76 69 73 |um.  set| the vis|
|000008c0| 69 62 69 6c 69 74 79 20 | 6f 66 20 73 70 72 69 74 |ibility |of sprit|
|000008d0| 65 20 73 70 72 69 74 65 | 4e 75 6d 20 74 6f 20 31 |e sprite|Num to 1|
|000008e0| 0d 20 20 73 65 74 20 74 | 68 65 20 76 69 73 69 62 |.  set t|he visib|
|000008f0| 69 6c 69 74 79 20 6f 66 | 20 73 70 72 69 74 65 20 |ility of| sprite |
|00000900| 32 32 20 74 6f 20 31 0d | 20 20 73 65 74 20 74 68 |22 to 1.|  set th|
|00000910| 65 20 76 69 73 69 62 69 | 6c 69 74 79 20 6f 66 20 |e visibi|lity of |
|00000920| 73 70 72 69 74 65 20 32 | 33 20 74 6f 20 30 0d 20 |sprite 2|3 to 0. |
|00000930| 20 73 65 74 20 74 68 65 | 20 76 69 73 69 62 69 6c | set the| visibil|
|00000940| 69 74 79 20 6f 66 20 73 | 70 72 69 74 65 20 32 34 |ity of s|prite 24|
|00000950| 20 74 6f 20 30 0d 20 20 | 2d 2d 73 65 74 20 74 68 | to 0.  |--set th|
|00000960| 65 20 76 69 73 69 62 69 | 6c 69 74 79 20 6f 66 20 |e visibi|lity of |
|00000970| 73 70 72 69 74 65 20 20 | 32 20 74 6f 20 30 0d 20 |sprite  |2 to 0. |
|00000980| 20 0d 65 6e 64 20 6d 6f | 75 73 65 55 70 0d 0d 6f | .end mo|useUp..o|
|00000990| 6e 20 6d 6f 75 73 65 43 | 68 65 63 6b 20 6c 74 2c |n mouseC|heck lt,|
|000009a0| 20 74 70 2c 20 72 74 2c | 20 62 74 2c 20 63 75 72 | tp, rt,| bt, cur|
|000009b0| 78 2c 20 63 75 72 79 0d | 20 20 0d 20 20 69 66 20 |x, cury.|  .  if |
|000009c0| 63 75 72 78 20 3e 20 6c | 74 20 61 6e 64 20 63 75 |curx > l|t and cu|
|000009d0| 72 78 20 3c 20 20 72 74 | 20 61 6e 64 20 63 75 72 |rx <  rt| and cur|
|000009e0| 79 3e 74 70 20 61 6e 64 | 20 63 75 72 79 20 3c 20 |y>tp and| cury < |
|000009f0| 62 74 20 74 68 65 6e 0d | 20 20 20 20 72 65 74 75 |bt then.|    retu|
|00000a00| 72 6e 20 74 72 75 65 0d | 20 20 65 6c 73 65 0d 20 |rn true.|  else. |
|00000a10| 20 20 20 72 65 74 75 72 | 6e 20 66 61 6c 73 65 0d |   retur|n false.|
|00000a20| 20 20 65 6e 64 20 69 66 | 0d 65 6e 64 20 6d 6f 75 |  end if|.end mou|
|00000a30| 73 65 43 68 65 63 6b    |                         |seCheck |        |
+--------+-------------------------+-------------------------+--------+--------+